約 3,959,218 件
https://w.atwiki.jp/auroot/pages/23.html
ipad / ipad2 の 脱獄 (ipadやiphoneではroot化ではなく脱獄といいます) 注意!:iOSのバージョンによって方法が異なります。 iOS 5.0の脱獄 現状では2つの脱獄ツールがリリースされている。Redsn0wとSn0wbreezeと二通りあるが Redsn0wはこちらから http //jailbreakers.info/iphone%e8%84%b1%e7%8d%84%e3%83%8b%e3%83%a5%e3%83%bc%e3%82%b9/faq#redsn0w iOS5ファームウェアをダウンロード。 iPad 2 WiFi http //appldnld.apple.com/iPhone4/041-9618.20111012.Zxb22/iPad2,1_5.0_9A334_Restore.ipsw iPad 2 3G GSM http //appldnld.apple.com/iPhone4/041-9619.20111012.y34Nx/iPad2,2_5.0_9A334_Restore.ipsw iPad 2 3G CDMA http //appldnld.apple.com/iPhone4/041-9620.20111012.pnB4r/iPad2,3_5.0_9A334_Restore.ipsw Redsn0wを起動して、 「Extras」を選択。 「Custom IPSW」をクリックして、先ほどダウンロードしたファームウェアを指定する。 Redsn0wが自動的にファームウェアを検証して、カスタムファームウェアを作る。 終わったら、「Pwned DFU」を選択してDFUモードへ突入。 2011-11-06 (日) 16 15 iPhone脱獄の方法 iOS5 | redsn0w 現状ではiOS5の脱獄は紐付きになってしまう。つまり、デバイスを再起動させるたびにPC/Macへの接続が必要になる。 この状況を打破すべく「半紐付き脱獄」なるものが登場したのがつい数週間前。本来、「紐付き脱獄」の場合は再起動さえもできなくなってしまうが、「半紐付き」の場合は昨日の制限があるものの再起動が可能だ。この数週間の間に、半紐付き脱獄は何度かアップデートが繰り返された。ようやく、使えるレベルに達したと思われる。 iOS5を脱獄したいユーザにとっては今のところ一番良い手段だ。 iPhone4S、iPad2についてはDev-Teamが紐なし脱獄をリリースする予定(時期は未定)。バグ情報などは@__jailbreakersで随時ツイートしているので確認して欲しい。 このエントリーでは、iOS5を半紐付き脱獄する方法を紹介する。 iOS5半紐付き脱獄の機能制限などについて バッテリ切れなどを起こして手元にPC/Macがない場合は以下のように動作する。 1 電話やメッセージアプリは使える。 2 株価アプリが使える 3 Safariが使える 4 Safari以外のブラウザ、例えばatomicなども使える 5 メールアプリは使えない。Safari経由でGmailなどは大丈夫。 6 脱獄アプリやcydiaの起動は不可 7 通知センターも動かない。 iOS5半紐付き脱獄の対応デバイス • iPhone 4• iPhone 3GS旧ブートロム• iPhone 3GS 新Bootrom• iPad • iPod Touch 第4世代• iPod Touch 第3世代 iOS5の半紐付き脱獄の手順その1-紐付き脱獄する- 初めにやることは、紐付き脱獄状態を作ること。 手順1:こちらのエントリーを参考にredsn0wをダウンロード Redsn0wによる脱獄 もしくは、redsn0wへのダイレクトリンクから。 手順2:以下のリンクから対応するiOS5ファームウェアをダウンロード。 iPhone 3GS iPhone 4 iPhone 4 CDMA iPad iPad 2 WiFi iPad 2 3G GSM iPad 2 3G CDMA iPod touch 3G iPod touch 4G 手順3:Redsn0wを起動して、 「Extras」を選択。 手順4:「Custom IPSW」をクリックして、先ほどダウンロードしたファームウェアを指定する。Redsn0wが自動的にファームウェアを検証して、カスタムファームウェアを作る。 手順5:終わったら、「Pwned DFU」を選択してDFUモードへ突入。 DFUモードへは、 1:電源ボタンを2秒押す。 2:ホームボタンを追加で押して10秒待つ。 3:電源ボタンだけを離して5秒待つ。 これでいけるはず。この手順は難しいので何度もトライ。 無事にDFUモードへ突入したらiTunesを立ち上げて、 optionキーを押しながら復元をクリック。 先程の手順で作成したカスタムファームウェアを指定する。 あとは、復元が終わるのを待つだけ。 ホーム画面にCydiaというアイコンが現れたら脱獄成功! Cydiaが起動したら「Developer」を選んでおけば大丈夫。 紐付き脱獄を半紐付き脱獄に変える。 Cydiaを開いて[Manage]- [Seources]- [Edit]と進んで 以下のリポジトリを入力したら、Addを押す。 http //thebigboss.org/semitether リポジトリを追加したら、「Semi tether」で検索をかける。 見つかったらインストール。 デバイスを再起動してみよう。 紐付き脱獄のようにAppleマークで止まることはなくちゃんと起動する。 .
https://w.atwiki.jp/yuichi/pages/33.html
IBMのノートPCのシリーズ。 535E
https://w.atwiki.jp/gijin-kareshi/pages/692.html
pudding beret nature 卵5個 牛乳5個 砂糖5個 ゼリー3個 -- (名無しさん) 2015-05-29 20 28 20 ステージ5 エルフの海 消費5 獲得Ep5 ステージクリア いちこパウダー 「マジカルゼリー…探してる…?」 どこにありますか?→50K 持ってますか?→マジカルゼリー×1 「ぶくぶく…君はどんな魚が好き…?」 小さい魚→マジカルゼリー×1 大きな魚→ふしぎなリボン or マジカルゼリー×2 「ぶくぶく…。」 沈んでる!→50K 大丈夫ですか?→マジカルゼリー×1 -- (美緑) 2015-05-29 22 23 43 ステージ4 エルフの草原 料理しないからわからないです→不思議なリボン*1 -- (名無しさん) 2015-05-29 23 00 07 ステージ2 合成は材料があっていても時には失敗することがあるんだ。 運試だね→ふしぎな糸、マジカルミルク×2 理不尽だね→マジカルミルク×1 -- (名無しさん) 2015-05-29 23 15 14 --ここまで編集しました--- -- (スイカ) 2015-05-30 00 12 37 ステージ5 追記です クリアでいちごパウダー×1 「ぶくぶく…〜」→ふしぎなリボン×1 台詞の前は全て「少年が話しかけてきた」です クリアに必要な体力は恐らく250です -- (美緑) 2015-05-30 00 23 36 macaron mode nature 砂糖、卵 各4個 -- (名無しさん) 2015-05-30 08 20 32 砂糖4、牛乳4、卵4でクッキー(biscuit) 染色は各パウダー×4 衣装とアクセサリーでレシピは違いません。 -- (美緑) 2015-05-30 11 03 51 macaron table nature←砂糖*4、卵*4 (マカロンも衣装とアクセのレシピは同じようです) -- (名無しさん) 2015-05-30 11 20 44 macaron tablenature 卵4 砂糖5でも確認されてます -- (名無しさん) 2015-05-30 11 23 34 クッキーは卵、砂糖、牛乳ではなく 卵、砂糖、小麦粉では? -- (名無しさん) 2015-05-30 11 25 34 すみません。 クッキーのレシピ間違えました。 上の方が言ってらっしゃる通り、卵、砂糖、小麦粉を4つずつです -- (美緑) 2015-05-30 11 35 51 ■■■ここまで編集しました■■■ 【合成機のアイテム(材料)について】 種類を把握していないので、「合成をはじめる」で表示される順番で教えてくださると幸いです。 レシピもそれに沿った順番で書いていくつもりです。 【ドロップアイテムについて】 ステージ2の牛乳の個数があいまいです。今回のイベは1個だったり2個だったりするので注意してください -- (スイカ) 2015-05-30 15 27 41 ①材料が2個出る選択肢では、稀に、不思議な糸×1や、不思議なリボン×1が出る様です。 Kも50Kと100Kが出る様です。(確認出来た物だけ修正しました。) ②衣装と装飾のレシピは同じです、どちらかがランダムに出ます。 ドーナツレシピの卵が3個、プリンレシピのゼリーが3個以外はオール4個でOKです。 【マカロン】砂糖4、卵4 【ドーナツ】砂糖4、牛乳4、卵3、小麦粉4、イースト4 【クッキー】砂糖4、卵4、小麦粉4 【パンケーキ】砂糖4、卵4、小麦粉4、イースト4 【プリン】砂糖4、牛乳4、卵4、ゼリー3 ③パウダーを4個入れると色が変わります。 無し=左列 いちごパウダー4個=中央列 まっちゃパウダー4個=右列 -- (名無しさん) 2015-05-30 18 39 07 【ステージ5エルフ海】のクリア必要体力は進行度1%だったので、必要体力500な気がするのですが、見間違っただけかもしれないので、どなたか確認をお願いします。 -- (名無しさん) 2015-05-30 18 43 04 すいません。イーストは、どこで手に入るんでしょうか? -- (名無しさん) 2015-05-30 20 43 02 ■■■ここまで編集しました■■■ 情報と編集ありがとうございます! -- (スイカ) 2015-05-30 21 48 03 pudding beret nature 頭装備 biscuit rosetta nature 体装備 でした -- (名無しさん) 2015-05-31 00 03 35 イーストはこれから解放になる追加ステージのステージ6。 -- (名無しさん) 2015-05-31 03 11 22 【ステージ5エルフ海】のクリア必要体力は進行度を確認してきました。最初が1%だけど、その後は、2%でした。 -- (名無しさん) 2015-05-31 17 05 26 すいません、イーストの情報教えて下さって有り難うございました。 -- (名無しさん) 2015-05-31 18 58 36 ■■■ここまで編集しました■■■ -- (スイカ) 2015-06-01 17 28 55 合成機のアバ画像追加しました。が、マカロンの画像は私では無い方がUPしてくださったので、画像の枠の種類?が違ってしまいました。 私のマカロンの画像もUPしておきましたので、もし不統一なのが気になったら編集お願いします。 -- (スイカ) 2015-06-01 17 31 52 ステージ1 エルフの山 食べ物は食べるもの→ふしぎないと×1, 不思議なリボン×1 -- (名無しさん) 2015-06-02 16 28 38 ステージ2 エルフの洞窟 運だめしだね→不思議なリボン×1 -- (名無しさん) 2015-06-02 16 30 01 ■■■ここまで編集しました■■■ -- (スイカ) 2015-06-04 12 12 22 ステージ6、エルフの森。 素敵だね!→ふしぎないと×2。 あと、現在イベントアイテムUP中なので、エルフの森のドロップアイテムは半分の数だと思うのですが・・・。 -- (名無しさん) 2015-06-06 16 39 02 pancake siropは体装飾でしたー -- (名無しさん) 2015-06-09 19 14 10 ■■■ここまで編集しました■■■ -- (スイカ) 2015-06-10 03 48 27 リボンや糸を使っても、確率上がるだけで、逆の物も作成されるし、失敗も極々稀に有るそうです。 -- (名無しさん) 2015-06-10 14 49 14
https://w.atwiki.jp/bookadmin104/pages/12.html
package jcode; ;###################################################################### ;# ;# jcode.pl Perl library for Japanese character code conversion ;# ;# Copyright (c) 1995-2000 Kazumasa Utashiro utashiro@iij.ad.jp ;# Internet Initiative Japan Inc. ;# 3-13 Kanda Nishiki-cho, Chiyoda-ku, Tokyo 101-0054, Japan ;# ;# Copyright (c) 1992,1993,1994 Kazumasa Utashiro ;# Software Research Associates, Inc. ;# ;# Use and redistribution for ANY PURPOSE are granted as long as all ;# copyright notices are retained. Redistribution with modification ;# is allowed provided that you make your modified version obviously ;# distinguishable from the original one. THIS SOFTWARE IS PROVIDED ;# BY THE AUTHOR ``AS IS AND ANY EXPRESS OR IMPLIED WARRANTIES ARE ;# DISCLAIMED. ;# ;# Original version was developed under the name of srekcah@sra.co.jp ;# February 1992 and it was called kconv.pl at the beginning. This ;# address was a pen name for group of individuals and it is no longer ;# valid. ;# ;# The latest version is available here ;# ;#ftp //ftp.iij.ad.jp/pub/IIJ/dist/utashiro/perl/ ;# ;; $rcsid = q$Id jcode.pl,v 2.13 2000/09/29 16 10 05 utashiro Exp $; ;# ;###################################################################### ;# ;# PERL4 INTERFACE ;# ;# jcode getcode(*line) ;#Return jis , sjis , euc or undef according to ;#Japanese character code in $line. Return binary if ;#the data has non-character code. ;# ;#When evaluated in array context, it returns a list ;#contains two items. First value is the number of ;#characters which matched to the expected code, and ;#second value is the code name. It is useful if and ;#only if the number is not 0 and the code is undef; ;#that case means it couldn t tell euc or sjis ;#because the evaluation score was exactly same. This ;#interface is too tricky, though. ;# ;#Code detection between euc and sjis is very difficult ;#or sometimes impossible or even lead to wrong result ;#when it includes JIS X0201 KANA characters. So JIS ;#X0201 KANA is ignored for automatic code detection. ;# ;# jcode convert(*line, $ocode [, $icode [, $option]]) ;#Convert the contents of $line to the specified ;#Japanese code given in the second argument $ocode. ;#$ocode can be any of "jis", "sjis" or "euc", or use ;#"noconv" when you don t want the code conversion. ;#Input code is recognized automatically from the line ;#itself when $icode is not supplied (JIS X0201 KANA is ;#ignored in code detection. See the above descripton ;#of getcode). $icode also can be specified, but ;#xxx2yyy routine is more efficient when both codes are ;#known. ;# ;#It returns the code of input string in scalar context, ;#and a list of pointer of convert subroutine and the ;#input code in array context. ;# ;#Japanese character code JIS X0201, X0208, X0212 and ;#ASCII code are supported. X0212 characters can not be ;#represented in SJIS and they will be replased by ;#"geta" character when converted to SJIS. ;# ;#See next paragraph for $option parameter. ;# ;# jcode xxx2yyy(*line [, $option]) ;#Convert the Japanese code from xxx to yyy. String xxx ;#and yyy are any convination from "jis", "euc" or ;#"sjis". They return *approximate* number of converted ;#bytes. So return value 0 means the line was not ;#converted at all. ;# ;#Optional parameter $option is used to specify optional ;#conversion method. String "z" is for JIS X0201 KANA ;#to X0208 KANA, and "h" is for reverse. ;# ;#$jcode convf{ xxx , yyy } ;#The value of this associative array is pointer to the ;#subroutine jcode xxx2yyy(). ;# ;# jcode to($ocode, $line [, $icode [, $option]]) ;# jcode jis($line [, $icode [, $option]]) ;# jcode euc($line [, $icode [, $option]]) ;# jcode sjis($line [, $icode [, $option]]) ;#These functions are prepared for easy use of ;#call/return-by-value interface. You can use these ;#funcitons in s///e operation or any other place for ;#convenience. ;# ;# jcode jis_inout($in, $out) ;#Set or inquire JIS start and end sequences. Default ;#is "ESC-$-B" and "ESC-(-B". If you supplied only one ;#character, "ESC-$" or "ESC-(" is prepended for each ;#character respectively. Acutually "ESC-(-B" is not a ;#sequence to end JIS code but a sequence to start ASCII ;#code set. So `in and `out are somewhat misleading. ;# ;# jcode get_inout($string) ;#Get JIS start and end sequences from $string. ;# ;# jcode cache() ;# jcode nocache() ;# jcode flush() ;#Usually, converted character is cached in memory to ;#avoid same calculations have to be done many times. ;#To disable this caching, call jcode nocache(). It ;#can be revived by jcode cache() and cache is flushed ;#by calling jcode flush(). cache() and nocache() ;#functions return previous caching state. ;# ;#--------------------------------------------------------------- ;# ;# jcode h2z_xxx(*line) ;#JIS X0201 KANA (so-called Hankaku-KANA) to X0208 KANA ;#(Zenkaku-KANA) code conversion routine. String xxx is ;#any of "jis", "sjis" and "euc". From the difficulty ;#of recognizing code set from 1-byte KATAKANA string, ;#automatic code recognition is not supported. ;# ;# jcode z2h_xxx(*line) ;#X0208 to X0201 KANA code conversion routine. String ;#xxx is any of "jis", "sjis" and "euc". ;# ;#$jcode z2hf{ xxx } ;#$jcode h2zf{ xxx } ;#These are pointer to the corresponding function just ;#as $jcode convf. ;# ;#--------------------------------------------------------------- ;# ;# jcode tr(*line, $from, $to [, $option]) ;# jcode tr emulates tr operator for 2 byte code. Only d ;#is interpreted as an option. ;# ;#Range operator like `A-Z for 2 byte code is partially ;#supported. Code must be JIS or EUC, and first byte ;#have to be same on first and last character. ;# ;#CAUTION Handling range operator is a kind of trick ;#and it is not perfect. So if you need to transfer `- ;#character, please be sure to put it at the beginning ;#or the end of $from and $to strings. ;# ;# jcode trans($line, $from, $to [, $option) ;#Same as jcode tr but accept string and return string ;#after translation. ;# ;#--------------------------------------------------------------- ;# ;# jcode init() ;#Initialize the variables used in this package. You ;#don t have to call this when using jocde.pl by `do or ;#`require interface. Call it first if you embedded ;#the jcode.pl at the end of your script. ;# ;###################################################################### ;# ;# PERL5 INTERFACE ;# ;# Current jcode.pl is written in Perl 4 but it is possible to use ;# from Perl 5 using `references . Fully perl5 capable version is ;# future issue. ;# ;# Since lexical variable is not a subject of typeglob, *string style ;# call doesn t work if the variable is declared as `my . Same thing ;# happens to special variable $_ if the perl is compiled to use ;# thread capability. So using reference is generally recommented to ;# avoid the mysterious error. ;# ;#jcode getcode(\$line) ;#jcode convert(\$line, $ocode [, $icode [, $option]]) ;#jcode xxx2yyy(\$line [, $option]) ;# {$jcode convf{ xxx , yyy }}(\$line) ;#jcode to($ocode, $line [, $icode [, $option]]) ;#jcode jis($line [, $icode [, $option]]) ;#jcode euc($line [, $icode [, $option]]) ;#jcode sjis($line [, $icode [, $option]]) ;#jcode jis_inout($in, $out) ;#jcode get_inout($string) ;#jcode cache() ;#jcode nocache() ;#jcode flush() ;#jcode h2z_xxx(\$line) ;#jcode z2h_xxx(\$line) ;# {$jcode z2hf{ xxx }}(\$line) ;# {$jcode h2zf{ xxx }}(\$line) ;#jcode tr(\$line, $from, $to [, $option]) ;#jcode trans($line, $from, $to [, $option) ;#jcode init() ;# ;###################################################################### ;# ;# SAMPLES ;# ;# Convert any Kanji code to JIS and print each line with code name. ;# ;#while (defined($s = )) { ;# $code = jcode convert(*s, jis ); ;# print $code, "\t", $s; ;#} ;# ;# Convert all lines to JIS according to the first recognized line. ;# ;#while (defined($s = )) { ;# print, next unless $s =~ /[\033\200-\377]/; ;# (*f, $icode) = jcode convert(*s, jis ); ;# print; ;# defined( f) || next; ;# while ( ) { f(*s); print; } ;# last; ;#} ;# ;# The safest way of JIS conversion. ;# ;#while (defined($s = )) { ;# ($matched, $icode) = jcode getcode(*s); ;# if (@buf == 0 $matched == 0) { ;#print $s; ;#next; ;# } ;# push(@buf, $s); ;# next unless $icode; ;# while (defined($s = shift(@buf))) { ;# jcode convert(*s, jis , $icode); ;#print $s; ;# } ;# while (defined($s = )) { ;# jcode convert(*s, jis , $icode); ;#print $s; ;# } ;# last; ;#} ;#print @buf if @buf; ;# ;###################################################################### ;# ;# Call initialize function if it is not called yet. This may sound ;# strange but it makes easy to embed the jcode.pl at the end of ;# script. Call jcode init at the beginning of the script in that ;# case. ;# init unless defined $version; ;# ;# Initialize variables. ;# sub init { $version = $rcsid =~ /,v ([\d.]+)/ ? $1 unknown ; $re_bin = [\000-\006\177\377] ; $re_jis0208_1978 = \e\$\@ ; $re_jis0208_1983 = \e\$B ; $re_jis0208_1990 = \e \@\e\$B ; $re_jis0208 = "$re_jis0208_1978|$re_jis0208_1983|$re_jis0208_1990"; $re_jis0212 = \e\$\(D ; $re_jp = "$re_jis0208|$re_jis0212"; $re_asc = \e\([BJ] ; $re_kana = \e\(I ; $esc_0208 = "\e\$B"; $esc_0212 = "\e\$(D"; $esc_asc = "\e(B"; $esc_kana = "\e(I"; $re_sjis_c = [\201-\237\340-\374][\100-\176\200-\374] ; $re_sjis_kana = [\241-\337] ; $re_euc_c = [\241-\376][\241-\376] ; $re_euc_kana = \216[\241-\337] ; $re_euc_0212 = \217[\241-\376][\241-\376] ; # Use `geta for undefined character code $undef_sjis = "\x81\xac"; $cache = 1; # X0201 - X0208 KANA conversion table. Looks weird? Not that # much. This is simply JIS text without escape sequences. ($h2z_high = $h2z = __TABLE_END__ ) =~ tr/\041-\176/\241-\376/; !!#$!"%! "!V#!W ^!+_!,0! %!(%#)%%*% +%) ,%c-%e.%g/%C 1%"2%$3% 4%(5%* 6%+7%-8%/9%1 %3 6^%,7^%.8^%09^%2 ^%4 ;%5 %7=%9 %;?%= ;^%6 ^%8=^% ^% ?^% @%?A%AB%DC%FD%H @^%@A^%BB^%EC^%GD^%I E%JF%KG%LH%MI%N J%OK%RL%UM%XN%[ J^%PK^%SL^%VM^%YN^%\ J_%QK_%TL_%WM_%ZN_%] O%^P%_Q%`R%aS%b T%dU%fV%h W%iX%jY%kZ%l[%m \%o]%s %r3^%t __TABLE_END__ %h2z = split(/\s+/, $h2z . $h2z_high); %z2h = reverse %h2z; $convf{ jis , jis } = *jis2jis; $convf{ jis , sjis } = *jis2sjis; $convf{ jis , euc } = *jis2euc; $convf{ euc , jis } = *euc2jis; $convf{ euc , sjis } = *euc2sjis; $convf{ euc , euc } = *euc2euc; $convf{ sjis , jis } = *sjis2jis; $convf{ sjis , sjis } = *sjis2sjis; $convf{ sjis , euc } = *sjis2euc; $h2zf{ jis } = *h2z_jis; $z2hf{ jis } = *z2h_jis; $h2zf{ euc } = *h2z_euc; $z2hf{ euc } = *z2h_euc; $h2zf{ sjis } = *h2z_sjis; $z2hf{ sjis } = *z2h_sjis; } ;# ;# Set escape sequences which should be put before and after Japanese ;# (JIS X0208) string. ;# sub jis_inout { $esc_0208 = shift || $esc_0208; $esc_0208 = "\e\$$esc_0208" if length($esc_0208) == 1; $esc_asc = shift || $esc_asc; $esc_asc = "\e\($esc_asc" if length($esc_asc) == 1; ($esc_0208, $esc_asc); } ;# ;# Get JIS in and out sequences from the string. ;# sub get_inout { local($esc_0208, $esc_asc); $_[$[] =~ /($re_jis0208)/o ($esc_0208 = $1); $_[$[] =~ /($re_asc)/o ($esc_asc = $1); ($esc_0208, $esc_asc); } ;# ;# Recognize character code. ;# sub getcode { local(*s) = @_; local($matched, $code); if ($s !~ /[\e\200-\377]/) {# not Japanese $matched = 0; $code = undef; }# jis elsif ($s =~ /$re_jp|$re_asc|$re_kana/o) { $matched = 1; $code = jis ; } elsif ($s =~ /$re_bin/o) {# binary $matched = 0; $code = binary ; } else {# should be euc or sjis local($sjis, $euc) = (0, 0); while ($s =~ /(($re_sjis_c)+)/go) { $sjis += length($1); } while ($s =~ /(($re_euc_c|$re_euc_kana|$re_euc_0212)+)/go) { $euc += length($1); } $matched = max($sjis, $euc); $code = ( euc , undef, sjis )[($sjis = $euc) + $[ + 1]; } wantarray ? ($matched, $code) $code; } sub max { $_[ $[ + ($_[ $[ ] $_[ $[ + 1 ]) ]; } ;# ;# Convert any code to specified code. ;# sub convert { local(*s, $ocode, $icode, $opt) = @_; return (undef, undef) unless $icode = $icode || getcode(*s); return (undef, $icode) if $icode eq binary ; $ocode = jis unless $ocode; $ocode = $icode if $ocode eq noconv ; local(*f) = $convf{$icode, $ocode}; f(*s, $opt); wantarray ? (*f, $icode) $icode; } ;# ;# Easy return-by-value interfaces. ;# sub jis { to( jis , @_); } sub euc { to( euc , @_); } sub sjis { to( sjis , @_); } sub to { local($ocode, $s, $icode, $opt) = @_; convert(*s, $ocode, $icode, $opt); $s; } sub what { local($s) = @_; getcode(*s); } sub trans { local($s) = shift; tr(*s, @_); $s; } ;# ;# SJIS to JIS ;# sub sjis2jis { local(*s, $opt, $n) = @_; sjis2sjis(*s, $opt) if $opt; $s =~ s/(($re_sjis_c|$re_sjis_kana)+)/ _sjis2jis($1) . $esc_asc/geo; $n; } sub _sjis2jis { local($s) = shift; $s =~ s/(($re_sjis_c)+|($re_sjis_kana)+)/ __sjis2jis($1)/geo; $s; } sub __sjis2jis { local($s) = shift; if ($s =~ /^$re_sjis_kana/o) { $n += $s =~ tr/\241-\337/\041-\137/; $esc_kana . $s; } else { $n += $s =~ s/($re_sjis_c)/$s2e{$1}|| s2e($1)/geo; $s =~ tr/\241-\376/\041-\176/; $esc_0208 . $s; } } ;# ;# EUC to JIS ;# sub euc2jis { local(*s, $opt, $n) = @_; euc2euc(*s, $opt) if $opt; $s =~ s/(($re_euc_c|$re_euc_kana|$re_euc_0212)+)/ _euc2jis($1) . $esc_asc /geo; $n; } sub _euc2jis { local($s) = shift; $s =~ s/(($re_euc_c)+|($re_euc_kana)+|($re_euc_0212)+)/ __euc2jis($1)/geo; $s; } sub __euc2jis { local($s) = shift; local($esc); if ($s =~ tr/\216//d) { $esc = $esc_kana; } elsif ($s =~ tr/\217//d) { $esc = $esc_0212; } else { $esc = $esc_0208; } $n += $s =~ tr/\241-\376/\041-\176/; $esc . $s; } ;# ;# JIS to EUC ;# sub jis2euc { local(*s, $opt, $n) = @_; $s =~ s/($re_jp|$re_asc|$re_kana)([^\e]*)/ _jis2euc($1,$2)/geo; euc2euc(*s, $opt) if $opt; $n; } sub _jis2euc { local($esc, $s) = @_; if ($esc !~ /^$re_asc/o) { $n += $s =~ tr/\041-\176/\241-\376/; if ($esc =~ /^$re_kana/o) { $s =~ s/([\241-\337])/\216$1/g; } elsif ($esc =~ /^$re_jis0212/o) { $s =~ s/([\241-\376][\241-\376])/\217$1/g; } } $s; } ;# ;# JIS to SJIS ;# sub jis2sjis { local(*s, $opt, $n) = @_; jis2jis(*s, $opt) if $opt; $s =~ s/($re_jp|$re_asc|$re_kana)([^\e]*)/ _jis2sjis($1,$2)/geo; $n; } sub _jis2sjis { local($esc, $s) = @_; if ($esc =~ /^$re_jis0212/o) { $s =~ s/../$undef_sjis/g; $n = length; } elsif ($esc !~ /^$re_asc/o) { $n += $s =~ tr/\041-\176/\241-\376/; if ($esc =~ /^$re_jp/o) { $s =~ s/($re_euc_c)/$e2s{$1}|| e2s($1)/geo; } } $s; } ;# ;# SJIS to EUC ;# sub sjis2euc { local(*s, $opt,$n) = @_; $n = $s =~ s/($re_sjis_c|$re_sjis_kana)/$s2e{$1}|| s2e($1)/geo; euc2euc(*s, $opt) if $opt; $n; } sub s2e { local($c1, $c2, $code); ($c1, $c2) = unpack( CC , $code = shift); if (0xa1 = $c1 $c1 = 0xdf) { $c2 = $c1; $c1 = 0x8e; } elsif (0x9f = $c2) { $c1 = $c1 * 2 - ($c1 = 0xe0 ? 0xe0 0x60); $c2 += 2; } else { $c1 = $c1 * 2 - ($c1 = 0xe0 ? 0xe1 0x61); $c2 += 0x60 + ($c2 0x7f); } if ($cache) { $s2e{$code} = pack( CC , $c1, $c2); } else { pack( CC , $c1, $c2); } } ;# ;# EUC to SJIS ;# sub euc2sjis { local(*s, $opt,$n) = @_; euc2euc(*s, $opt) if $opt; $n = $s =~ s/($re_euc_c|$re_euc_kana|$re_euc_0212)/$e2s{$1}|| e2s($1)/geo; } sub e2s { local($c1, $c2, $code); ($c1, $c2) = unpack( CC , $code = shift); if ($c1 == 0x8e) {# SS2 return substr($code, 1, 1); } elsif ($c1 == 0x8f) {# SS3 return $undef_sjis; } elsif ($c1 % 2) { $c1 = ($c1 1) + ($c1 0xdf ? 0x31 0x71); $c2 -= 0x60 + ($c2 0xe0); } else { $c1 = ($c1 1) + ($c1 0xdf ? 0x30 0x70); $c2 -= 2; } if ($cache) { $e2s{$code} = pack( CC , $c1, $c2); } else { pack( CC , $c1, $c2); } } ;# ;# JIS to JIS, SJIS to SJIS, EUC to EUC ;# sub jis2jis { local(*s, $opt) = @_; $s =~ s/$re_jis0208/$esc_0208/go; $s =~ s/$re_asc/$esc_asc/go; h2z_jis(*s) if $opt =~ /z/; z2h_jis(*s) if $opt =~ /h/; } sub sjis2sjis { local(*s, $opt) = @_; h2z_sjis(*s) if $opt =~ /z/; z2h_sjis(*s) if $opt =~ /h/; } sub euc2euc { local(*s, $opt) = @_; h2z_euc(*s) if $opt =~ /z/; z2h_euc(*s) if $opt =~ /h/; } ;# ;# Cache control functions ;# sub cache { ($cache, $cache = 1)[$[]; } sub nocache { ($cache, $cache = 0)[$[]; } sub flushcache { undef %e2s; undef %s2e; } ;# ;# X0201 - X0208 KANA conversion routine ;# sub h2z_jis { local(*s, $n) = @_; if ($s =~ s/$re_kana([^\e]*)/$esc_0208 . _h2z_jis($1)/geo) { 1 while $s =~ s/(($re_jis0208)[^\e]*)($re_jis0208)/$1/o; } $n; } sub _h2z_jis { local($s) = @_; $n += $s =~ s/(([\041-\137])([\136\137])?)/ $h2z{$1} || $h2z{$2} . $h2z{$3} /ge; $s; } sub h2z_euc { local(*s) = @_; $s =~ s/\216([\241-\337])(\216([\336\337]))?/ $h2z{"$1$3"} || $h2z{$1} . $h2z{$3} /ge; } sub h2z_sjis { local(*s, $n) = @_; $s =~ s/(($re_sjis_c)+)|(([\241-\337])([\336\337])?)/ $1 || ($n++, $h2z{$3} ? $e2s{$h2z{$3}} || e2s($h2z{$3}) e2s($h2z{$4}) . ($5 e2s($h2z{$5}))) /geo; $n; } ;# ;# X0208 - X0201 KANA conversion routine ;# sub z2h_jis { local(*s, $n) = @_; $s =~ s/($re_jis0208)([^\e]+)/ _z2h_jis($2)/geo; $n; } sub _z2h_jis { local($s) = @_; $s =~ s/((\%[!-~]|![\#\" VW+, ])+|([^!%][!-~]|![^\#\" VW+, ])+)/ __z2h_jis($1) /ge; $s; } sub __z2h_jis { local($s) = @_; return $esc_0208 . $s unless $s =~ /^%/ || $s =~ /^![\#\" VW+, ]/; $n += length($s) / 2; $s =~ s/(..)/$z2h{$1}/g; $esc_kana . $s; } sub z2h_euc { local(*s, $n) = @_; init_z2h_euc unless defined %z2h_euc; $s =~ s/($re_euc_c|$re_euc_kana)/ $z2h_euc{$1} ? ($n++, $z2h_euc{$1}) $1 /geo; $n; } sub z2h_sjis { local(*s, $n) = @_; init_z2h_sjis unless defined %z2h_sjis; $s =~ s/($re_sjis_c)/$z2h_sjis{$1} ? ($n++, $z2h_sjis{$1}) $1/geo; $n; } ;# ;# Initializing JIS X0208 to X0201 KANA table for EUC and SJIS. This ;# can be done in init but it s not worth doing. Similarly, ;# precalculated table is not worth to occupy the file space and ;# reduce the readability. The author personnaly discourages to use ;# X0201 Kana character in the any situation. ;# sub init_z2h_euc { local($k, $s); while (($k, $s) = each %z2h) { $s =~ s/([\241-\337])/\216$1/g ($z2h_euc{$k} = $s); } } sub init_z2h_sjis { local($s, $v); while (($s, $v) = each %z2h) { $s =~ /[\200-\377]/ ($z2h_sjis{ e2s($s)} = $v); } } ;# ;# TR function for 2-byte code ;# sub tr { # $prev_from, $prev_to, %table are persistent variables local(*s, $from, $to, $opt) = @_; local(@from, @to); local($jis, $n) = (0, 0); $jis++, jis2euc(*s) if $s =~ /$re_jp|$re_asc|$re_kana/o; $jis++ if $to =~ /$re_jp|$re_asc|$re_kana/o; if (!defined($prev_from) || $from ne $prev_from || $to ne $prev_to) { ($prev_from, $prev_to) = ($from, $to); undef %table; _maketable; } $s =~ s/([\200-\377][\000-\377]|[\000-\377])/ defined($table{$1}) ++$n ? $table{$1} $1 /ge; euc2jis(*s) if $jis; $n; } sub _maketable { local($ascii) = (\\\\[\\-\\\\]|[\0-\133\135-\177]) ; jis2euc(*to) if $to =~ /$re_jp|$re_asc|$re_kana/o; jis2euc(*from) if $from =~ /$re_jp|$re_asc|$re_kana/o; grep(s/(([\200-\377])[\200-\377]-\2[\200-\377])/ _expnd2($1)/ge, $from, $to); grep(s/($ascii-$ascii)/ _expnd1($1)/geo, $from, $to); @to = $to =~ /[\200-\377][\000-\377]|[\000-\377]/g; @from = $from =~ /[\200-\377][\000-\377]|[\000-\377]/g; push(@to, ($opt =~ /d/ ? $to[$#to]) x (@from - @to)) if @to @from; @table{@from} = @to; } sub _expnd1 { local($s) = @_; $s =~ s/\\(.)/$1/g; local($c1, $c2) = unpack( CxC , $s); if ($c1 = $c2) { for ($s = ; $c1 = $c2; $c1++) { $s .= pack( C , $c1); } } $s; } sub _expnd2 { local($s) = @_; local($c1, $c2, $c3, $c4) = unpack( CCxCC , $s); if ($c1 == $c3 $c2 = $c4) { for ($s = ; $c2 = $c4; $c2++) { $s .= pack( CC , $c1, $c2); } } $s; } 1;
https://w.atwiki.jp/wiki6_dbz/pages/190.html
■iPadでマジック ■iPadを触るネコ ■iPadでストIVをプレイしてみたよ。
https://w.atwiki.jp/thinkpad8/pages/22.html
下記はAmazon.co.jpへのリンクとなっていますのでご了承ください。 【反射防止(アンチグレア) 液晶保護フィルム】ThinkPadタブレット ThinkPad 8 (8.3インチ)機種用 気泡が消えるエアーレス加工 〔クリーニングクロス&ヘラ付〕 Lenovo ThinkPad 8用 液晶保護フィルム 反射防止(マット)タイプ 【ブルーライトカット 液晶保護フィルム 反射防止加工 ホワイトタイプ】ThinkPadタブレット ThinkPad 8 (8.3インチ)機種用 気泡が消えるエアーレス&抗菌加工 〔クリーニングクロス&ヘラ付〕 Lenovo ThinkPad 8用 液晶保護フィルム 防指紋(クリア)タイプ Lenovo ThinkPad 8用 液晶保護フィルム アンチグレアなのに透明なARコートタイプ! 【カット率35%! ブルーライトカット 液晶保護フィルム グレー色タイプ】ThinkPadタブレット ThinkPad 8 (8.3インチ)機種用 気泡が消えるエアーレス加工 〔クリーニングクロス&ヘラ付〕 Lenovo ThinkPad 8用 液晶保護フィルム 超撥水で水滴を弾く!すべすべタッチの抗菌タイプ Lenovo ThinkPad 8用 液晶保護フィルム 清潔で目に優しい アンチグレア・ブルーライトカットタイプ☆ Lenovo ThinkPad 8用 液晶保護フィルム 鏡に変わる!ハーフミラー(防指紋)タイプ 【のぞき見防止(左右2方向)プライバシー保護フィルム(反射防止機能付)】Lenovo ThinkPad 8 20BNCTO1WW 【 8.3インチ(1920x1200)】機種で使える目を保護、キズ防止、防塵、セキュリティー液晶保護フィルム(クリーニングクロスとヘラ付)(縦長フィルム) 【のぞき見防止(上下左右4方向)プライバシー保護フィルム(反射防止機能付)】Lenovo ThinkPad 8 20BN002DJP【8.3インチ(1920x1200)】機種で使える目を保護、キズ防止、防塵、セキュリティー液晶保護フィルム(クリーニングクロスとヘラ付)?
https://w.atwiki.jp/88amino88/pages/9.html
@wikiにはいくつかの便利なプラグインがあります。 アーカイブ コメント ニュース 動画(Youtube) 編集履歴 関連ブログ これ以外のプラグインについては@wikiガイドをご覧ください = http //atwiki.jp/guide/
https://w.atwiki.jp/88amino88/pages/10.html
関連ブログ @wikiのwikiモードでは #bf(興味のある単語) と入力することで、あるキーワードに関連するブログ一覧を表示することができます 詳しくはこちらをご覧ください。 =>http //atwiki.jp/guide/17_161_ja.html たとえば、#bf(ゲーム)と入力すると以下のように表示されます。 #bf
https://w.atwiki.jp/ragtimema/pages/41.html
このページはhttp //plaza.rakuten.co.jp/ragtimema/diary/200804210010/からの引用です 楽天市場 インフォシーク ブログをつくろう! ブログ/フォト/SNS|口コミ 349994 ALL ABOUT (音楽)楽天ブログ 【ケータイで見る】【ログイン】 HIROMI RUMIANTSEVA カレンダー 2008年4月 日 月 火 水 木 金 土 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 前の月 今月 次の月 キーワードサーチ を で検索 楽天ブログから を 日記フォト動画 カテゴリ ・カテゴリ未分類(42) ・旅行(50) ・ラグタイム(10243) ・音楽(201) ・思い出(351) ・ライブ・コンサート(276) ・料理(66) ・ジャズ(45) ・社会問題(55) ・映画(19) バックナンバー ・2008年4月 ・2008年3月 ・2008年2月 ・2008年1月 ・2007年12月 モバイル ケータイに このブログの URLを送信! おすすめリンク Loading now.... おすすめアイテム ラグタイム / 勝手にしやがれ 【送料無料選択可!】www.CHILDHOOD MAKERS.com / CHILDHOOD MAKERS オドイーター除菌・消臭スプレー 180ml ragtimemaの日記 │ 前へ│次へ │一覧│コメントを書く| 2008年04月21日 ALL ABOUT [ ラグタイム ] ●RAGTIMEMAのSO-NET http //ragtimema.so-netsns.jp/?m=pc a=page_f_home target_c_member_id=1 ●Jとーく『ラグタイム』掲示板 http //bbs.jword.jp/forum.php?op_type=forum keyword=%A5%E9%A5%B0%A5%BF%A5%A4%A5%E0 ●@JAZZ、RAGTIMEMA コミュニティ ファイル共有http //www.jazz.co.jp/Group/file_index.html?GRP_ID=54 ●@JAZZ、RAGTIMEMA コミュニティ 専用掲示板(一般非公開)http //www.jazz.co.jp/Group/bbs_index.html?GRP_ID=54 ●ウォーカープラス、グルメ狂 『ラグタイム・ママ』http //www.walkerplus.com/mypage/jibun.cgi/19e274f5c56a2f923885a44d58e9512c/ ●RAGTIMEMA のYAPLOGhttp //yaplog.jp/ragtimema/ ●RAGTIMEMA のPETITMALLhttp //ragtimema.blog4.petitmall.jp/ ●NOWA『ラグタイム』http //nowa.jp/ch/ragtime/ ●ジブンウォーカー『ラグタイム』http //www.walkerplus.com/community/community.cgi/2536/ ●ALL ABOUThttp //i.allabout.co.jp/users/19627 ● ECナビhttp //profile.ecnavi.jp/ragtimema/ ● NOWAhttp //ragtimema.nowa.jp/ ● COOKPADhttp //cookpad.com/mykitchen/?uid=697096 ● アミーゴhttp //amigo.livedoor.com/search/detail?id=224122 ● マイ・ニュースhttp //starss.jp/RAGTIMEMA 最終更新日 2008年04月21日 00時45分48秒コメント(0)|トラックバック(0)|コメントを書く タグ:ALL ABOUT,裕美・ルミィヤンツェヴァ,ラグタイム この記事のトラックバックURL: http //tb.plaza.rakuten.co.jp/ragtimema/diary/200804210010/185bf/ Loading now.... ■コメント お名前 タイトル 顔選択普通うれしい悲涙アイタタえ〜っムムッないしょ メッセージ ・メッセージ本文は全角で800文字までです。 ・書き込みに際しては楽天ブログ規約の禁止事項や免責事項をご確認ください ・ページの設定によっては、プルダウンで「顔選択」を行っても、アイコンが表示されません。ご了承ください。 │ 前へ│次へ │一覧│コメントを書く│一番上に戻る│ Powered By Copyright (c) 1997-2008 Rakuten, Inc. All Rights Reserved.
https://w.atwiki.jp/taleswords/pages/906.html
リーフゼリッピ【MOB 通常MOB】りーふぜりっぴ 住所 クライデン平原(1)(7)、セルバス平原(1)(7)(8)、ペナイン森(2)(4) 外見 頭に双葉の生えた黄色いゼリー状のひよこ 通称 不明 攻撃手段は物理攻撃のみ。普段は非アクティブ。通常ドロップはゼリーリーフ。 レアドロップはリーフゼリークリーム、Lv.4~8装備数種類など。 ↓関連 ゼリッピ ポイズンゼリッピ ポイズンリーフゼリッピ アイスゼリッピ ホットゼリッピ フラワーゼリッピ まげッピ